10 IFA=0THENPOKE53280,0:POKE53281,0:PRINT"[147][129]"SPC(16)"[205][160][197][160][204][160][197][160][197]":GOSUB280 20 IFA=0THENPOKE147,0:SYS57812"COLOR.CHASE.O",8,1:SYS62631:GOTO80 30 GOSUB500:POKE46,65:POKE48,64:POKE50,65:POKE52,129:LOAD"MELEE",8 40 A$="STORY READER":GOTO251 80 L$="[163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163][163]":FORI=0TO9:READC(I):NEXT 85 Q$="[145][221][155] [146][221]" 90 PRINT"[152][176][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][174]" 95 PRINTQ$ 100 PRINT"[145][221] 1. [196]ARE TO [197]NTER [199]ILGAMESH [146][221]" 110 PRINT"[145][221] 2. [210]EAD THE [211]TORY BEHIND [205][197][204][197][197] [146][221]" 120 PRINT"[145][221] 3. [210]ETURN [212]O [204][207][193][196][211][212][193][210] [146][221] " 135 PRINTQ$ 140 PRINT"[145][173][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][192][189][151]":S$=L$ 150 FORI=0TO12STEP3:Z=Z+1:POKE646,C(Z):L$=MID$(L$,3):PRINTSPC(20-LEN(L$)/2)L$ 160 NEXT:Z=0:POKE251,2:POKE252,4:POKE253,36:POKE254,7:SYS49152 170 GETA$:GOSUB390:SYS49155:IFA$<"1"ORA$>"3"THENSYS49155:GOTO170 180 ONVAL(A$)GOTO30,40,230 220 GOTO170 230 OPEN15,8,15,"R0:HELLO CONNECT=HELLO CONNECT":INPUT#15,ER:CLOSE15 240 IF ER<>63 THEN PRINT"[147]":END 250 A$="HELLO CONNECT" 251 Q$=CHR$(34):POKE53281,7:POKE53280,7:PRINT"[147]" 260 PRINT"[158]LOAD"Q$A$Q$",8" 270 PRINT"RUN":POKE631,13:POKE632,13:POKE198,2:END 280 POKE214,15:PRINT:PRINT" [155][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][184][152]" 290 FORI=1TO3:PRINT"  ":NEXT 300 PRINT"  [208]UBLISHED ON [204][207][193][196][211][212][193][210] #61 " 310 PRINT"  [211]UBSCRIPTIONS 1-800-831-2694 " 320 PRINT"  [195][200][193][206][199][201][206][199][160][212][200][201][211][160][206][207][212][201][195][197][160][201][211][160][201][204][204][197][199][193][204] " 330 PRINT"  " 340 PRINT" [151][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185][185]" 350 AU$="[205][160][197][160][204][160][197][160][197]":POKE214,17:PRINT:PRINTSPC(20-LEN(AU$)/2)"[152]"AU$ 360 AU$="[194]Y [195]LEVELAND [194]LAKEMORE ([195]) 1989":POKE214,18:PRINT 370 PRINTSPC(20-LEN(AU$)/2)"[152]"AU$"":RETURN 380 DATA15,3,14,6,14,6,3,15,3,14 390 PRINT"":L$=S$:C=C+1:SYS49155:IFC>5THENC=1 400 FORI=0TO12STEP3:POKE646,C(Z+C):L$=MID$(L$,3) 405 SYS49155:PRINTSPC(20-LEN(L$)/2)L$ 410 SYS49155:Z=Z+1:NEXT:Z=0:RETURN 500 FORI=5TO9:SS=40*I+1027:FORII=SSTOSS+33:POKEII,160:NEXT:NEXT 510 POKE214,6:PRINT:PRINTTAB(12)"[155][204] [207] [193] [196] [201] [206] [199] . . .":RETURN